home *** CD-ROM | disk | FTP | other *** search
/ Chip: 2001 Haziran / CHIP Haziran2001.iso / prog / yerli / 07 / _SETUP.1 / Emlak 2000.exe / 0 / RCDATA / TFORM36 / TFORM36.txt < prev   
Encoding:
Text File  |  1999-02-04  |  3.8 KB  |  193 lines

  1. object Form36: TForm36
  2.   Left = 226
  3.   Top = 147
  4.   AutoSize = True
  5.   BorderStyle = bsNone
  6.   Caption = 'Arama'
  7.   ClientHeight = 380
  8.   ClientWidth = 640
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   OldCreateOrder = False
  16.   OnCreate = FormCreate
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Image1: TImage
  20.     Left = 0
  21.     Top = 0
  22.     Width = 640
  23.     Height = 380
  24.     AutoSize = True
  25.     Picture.Data = {<image000.jpg>}
  26.     OnMouseDown = Image1MouseDown
  27.   end
  28.   object Image2: TImage
  29.     Left = 352
  30.     Top = 24
  31.     Width = 100
  32.     Height = 25
  33.     AutoSize = True
  34.     Picture.Data = {<image001.jpg>}
  35.     OnClick = Image2Click
  36.   end
  37.   object Image3: TImage
  38.     Left = 584
  39.     Top = 24
  40.     Width = 13
  41.     Height = 13
  42.     AutoSize = True
  43.     Picture.Data = {<image002.bmp>}
  44.     OnClick = Image3Click
  45.   end
  46.   object Image4: TImage
  47.     Left = 568
  48.     Top = 24
  49.     Width = 13
  50.     Height = 13
  51.     AutoSize = True
  52.     Picture.Data = {<image003.bmp>}
  53.     OnClick = Image4Click
  54.   end
  55.   object Image5: TImage
  56.     Left = 464
  57.     Top = 24
  58.     Width = 100
  59.     Height = 25
  60.     AutoSize = True
  61.     Picture.Data = {<image004.jpg>}
  62.     OnClick = Image5Click
  63.   end
  64.   object DBGrid1: TDBGrid
  65.     Left = 29
  66.     Top = 64
  67.     Width = 580
  68.     Height = 305
  69.     DataSource = DataSource1
  70.     TabOrder = 0
  71.     TitleFont.Charset = DEFAULT_CHARSET
  72.     TitleFont.Color = clWindowText
  73.     TitleFont.Height = -11
  74.     TitleFont.Name = 'MS Sans Serif'
  75.     TitleFont.Style = []
  76.     OnDblClick = DBGrid1DblClick
  77.     Columns = <
  78.       item
  79.         Expanded = False
  80.         FieldName = 'Ad'
  81.         Width = 128
  82.         Visible = True
  83.       end
  84.       item
  85.         Expanded = False
  86.         FieldName = 'Soyad'
  87.         Width = 146
  88.         Visible = True
  89.       end
  90.       item
  91.         Expanded = False
  92.         FieldName = 'Telefon'
  93.         Width = 138
  94.         Visible = True
  95.       end
  96.       item
  97.         Expanded = False
  98.         FieldName = 'Ceptel'
  99.         Width = 132
  100.         Visible = True
  101.       end>
  102.   end
  103.   object Edit1: TEdit
  104.     Left = 136
  105.     Top = 24
  106.     Width = 81
  107.     Height = 21
  108.     TabOrder = 1
  109.   end
  110.   object ComboBox2: TComboBox
  111.     Left = 240
  112.     Top = 24
  113.     Width = 81
  114.     Height = 21
  115.     Style = csDropDownList
  116.     ItemHeight = 13
  117.     TabOrder = 2
  118.     Items.Strings = (
  119.       'E∩┐╜le∩┐╜ir'
  120.       '∩┐╜le Ba∩┐╜lar'
  121.       '∩┐╜le Biter'
  122.       '∩┐╜∩┐╜erir')
  123.   end
  124.   object ComboBox1: TComboBox
  125.     Left = 40
  126.     Top = 24
  127.     Width = 73
  128.     Height = 21
  129.     Style = csDropDownList
  130.     ItemHeight = 13
  131.     TabOrder = 3
  132.     Items.Strings = (
  133.       'Ad'
  134.       'Soyad'
  135.       '∩┐╜l')
  136.   end
  137.   object DataSource1: TDataSource
  138.     DataSet = Query1
  139.     Left = 368
  140.     Top = 48
  141.   end
  142.   object Query1: TQuery
  143.     Active = True
  144.     SQL.Strings = (
  145.       'select * from tel')
  146.     Left = 400
  147.     Top = 48
  148.     object Query1No: TIntegerField
  149.       FieldName = 'No'
  150.     end
  151.     object Query1Ad: TStringField
  152.       FieldName = 'Ad'
  153.     end
  154.     object Query1Soyad: TStringField
  155.       FieldName = 'Soyad'
  156.     end
  157.     object Query1Telefon: TStringField
  158.       FieldName = 'Telefon'
  159.     end
  160.     object Query1Aciklama: TMemoField
  161.       FieldName = 'Aciklama'
  162.       BlobType = ftMemo
  163.       Size = 50
  164.     end
  165.     object Query1Ikincitel: TStringField
  166.       FieldName = 'Ikincitel'
  167.     end
  168.     object Query1Ceptel: TStringField
  169.       FieldName = 'Ceptel'
  170.     end
  171.     object Query1Faks: TStringField
  172.       FieldName = 'Faks'
  173.     end
  174.     object Query1Il: TStringField
  175.       FieldName = 'Il'
  176.     end
  177.     object Query1Resim: TGraphicField
  178.       FieldName = 'Resim'
  179.       BlobType = ftGraphic
  180.     end
  181.     object Query1Adres: TMemoField
  182.       FieldName = 'Adres'
  183.       BlobType = ftMemo
  184.       Size = 50
  185.     end
  186.     object Query1M: TMemoField
  187.       FieldName = 'M'
  188.       BlobType = ftMemo
  189.       Size = 1
  190.     end
  191.   end
  192. end
  193.